home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / pc_board / pcbss20.zip / NEWCALL.DEF < prev    next >
Text File  |  1991-06-19  |  2KB  |  75 lines
  1.   NEWLINE 24
  2.   INDENT  5
  3.   TEXT  "---------------------------------------------------------------"
  4.   TEXT  "             **** QExchange Bulletin Board ****"
  5.   TEXT  "---------------------------------------------------------------"
  6.   NEWLINE 2
  7.   TEXT  "You are in the new caller login section. After completing"
  8.   TEXT  "the questions below, you will be returned to the main bulletin"
  9.   TEXT  "board."
  10.   TEXT  ""
  11.   TEXT  "This is a one-time procedure. Estimated time to complete this"
  12.   TEXT  "questionnaire is 2 to 4 minutes."
  13.   TEXT  ""
  14.   TEXT  "                  Date: " @sysdate@
  15.   TEXT  "                  Time: " @systime@
  16.   TEXT  "           Caller Name: " @user@
  17.   TEXT  "           City, State: " @city@
  18.   TEXT  "        Security Level: " @security@
  19.   TEXT  "             Baud Rate: " @bps@
  20.   TEXT  "                  Node: " @node@
  21.   TEXT  ""
  22.   TEXT  "---------------------------------------------------------------"
  23.   TEXT  ""
  24.   INDENT  0
  25.  
  26.   DISPLAY_FILE J:\PCB\SS\NEWCALL.MSG
  27.  
  28.   ;
  29.   ; Field definitions
  30.   ;
  31.   FIELDS
  32.     Name    .........................     C     @user@
  33.     Company ___......................     C
  34.     Addr1   _____....................     C
  35.     Addr2   .........................     C
  36.     CitySt  _____....................     C     @city@
  37.     Zip     _____                         N
  38.     Country ___......................     C     "USA"
  39.     Phone   _                             P
  40.     Fax     _                             P
  41.   FIELDS
  42.   ;
  43.   ; Field entry
  44.   ;
  45.   PROMPT "            Name: " Name
  46.   PROMPT "         Company: " Company
  47.   PROMPT "  Address line 1: " Addr1
  48.   PROMPT "  Address line 2: " Addr2
  49.   PROMPT "     City, State: " CitySt
  50.   PROMPT "             Zip: " Zip
  51.   PROMPT "         Country: " Country
  52.   PROMPT "    Phone Number: " Phone
  53.   PROMPT "      Fax Number: " Fax
  54.   ;
  55.   ; append data to log file
  56.   ;
  57.   TEXT   "Logging data. Please wait..."
  58.   LOG_DATA J:\PCB\SS\NEWCALL.LOG        ;── edit accordingly
  59.     "            Name: " Name
  60.     "         Company: " Company
  61.     "  Address line 1: " Addr1
  62.     "  Address line 2: " Addr2
  63.     "     City, State: " CitySt
  64.     "             Zip: " Zip
  65.     "         Country: " Country
  66.     "    Phone Number: " Phone
  67.     "      Fax Number: " Fax
  68.     "       Date/Time: " @sysdate@  @systime@
  69.     "  Node/Port/Baud: " @node@  @port@  @bps@
  70.   LOG_DATA
  71.   ;
  72.   ; all done...
  73.   ;
  74.   EXIT
  75.